POV-Ray : Newsgroups : povray.general : My turn! : Re: My turn! Server Time
8 Aug 2024 08:15:04 EDT (-0400)
  Re: My turn!  
From: Kevin Wampler
Date: 10 May 2001 02:05:42
Message: <3AFA277A.440A9AA4@u.arizona.edu>
Whoops, line wraps messed the formatting up, and I made a type too...  Hopefully this
will be better

#version unofficial MegaPov 0.6;camera{location-z*8direction z*2look_at 0}
light_source{<-2,5,-2>*1e3 rgb 1}%K=text{ttf"cyrvetic.ttf""KEVIN".25,0
translate-1.5*x scale 1.5}%G=pigment{rgb<.8,.6,.4>}%R=seed(0);#macro B()<rand(
R)-.5,rand(R)-.5,rand(R)-.5>#end#macro A(C)%T=0;%V=<0,1,0>;#while(T<250)%S=0;%
P=B();%U=trace(K,C,P)-C;#while(S<15)%P1=B();%W=trace(K,C,P1)-C;#if(vlength(W)
<vlength(U))%P=P1;%U=trace(K,C,P)-C;#end%S=S+1;#end%V=V+P;%V=V/vlength(V);%D=(
250-T)/1e4;union{cylinder{C,C+V*.03,D}sphere{C,D}triangle{C,C+B()*D*10,C+B()*D
*4 pigment{rgb<0,.7,0>}}pigment{G}no_shadow}%C=C+V*.03;%T=T+1;#end#end%N=0;
#while(N<35)A(<(rand(R)-.5)*3, 0, rand(R)/4>*1.7)%N=N+1;#end  // Kevin Wampler


Post a reply to this message

Copyright 2003-2023 Persistence of Vision Raytracer Pty. Ltd.